Combined Data Analysis
##
## Call:
## lm(formula = running_sum ~ gini_2017 + pop_millions + gdp_billions +
## health_exp_gdp_2016 + out_pocket_exp_2016 + private_exp_pp_2016,
## data = b)
##
## Residuals:
## 1 2 3 4 5 9 13 16 17 18
## -674.4 551.9 1121.7 -5238.4 -4538.1 93.4 -1696.6 4401.2 1794.1 2858.0
## 20
## 1327.4
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 53912.82 26536.83 2.032 0.11201
## gini_2017 -1535.64 494.36 -3.106 0.03600 *
## pop_millions 1534.95 545.27 2.815 0.04807 *
## gdp_billions -119.47 53.62 -2.228 0.08979 .
## health_exp_gdp_2016 -5355.34 1840.97 -2.909 0.04372 *
## out_pocket_exp_2016 1097.55 217.52 5.046 0.00725 **
## private_exp_pp_2016 92.92 24.39 3.810 0.01895 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 4622 on 4 degrees of freedom
## (10 observations deleted due to missingness)
## Multiple R-squared: 0.9787, Adjusted R-squared: 0.9467
## F-statistic: 30.58 on 6 and 4 DF, p-value: 0.002654
##
## Call:
## lm(formula = scale(running_sum) ~ scale(gini_2017) + scale(pop_millions) +
## scale(gdp_billions) + scale(health_exp_gdp_2016) + scale(out_pocket_exp_2016) +
## scale(private_exp_pp_2016), data = b)
##
## Residuals:
## 1 2 3 4 5 9 13 16
## -0.043279 0.035414 0.071982 -0.336145 -0.291210 0.005993 -0.108872 0.282421
## 17 18 20
## 0.115124 0.183395 0.085176
## attr(,"scaled:center")
## [1] 8420
## attr(,"scaled:scale")
## [1] 15584
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.3365 0.2614 -1.287 0.26740
## scale(gini_2017) -0.4297 0.1383 -3.106 0.03600 *
## scale(pop_millions) 4.8614 1.7269 2.815 0.04807 *
## scale(gdp_billions) -4.7464 2.1301 -2.228 0.08979 .
## scale(health_exp_gdp_2016) -0.7201 0.2475 -2.909 0.04372 *
## scale(out_pocket_exp_2016) 0.8478 0.1680 5.046 0.00725 **
## scale(private_exp_pp_2016) 1.0649 0.2795 3.810 0.01895 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.2966 on 4 degrees of freedom
## (10 observations deleted due to missingness)
## Multiple R-squared: 0.9787, Adjusted R-squared: 0.9467
## F-statistic: 30.58 on 6 and 4 DF, p-value: 0.002654

## `geom_smooth()` using method = 'loess' and formula 'y ~ x'




